10 INPUT"NAME ";N$:SYS57812N$,8,1:POKE780,0:SYS65493
11 PRINT"[147]":X=15360:POKE53280,0:POKE53281,0
12 FORG=1024TO2024:POKEG,PEEK(X+G):NEXT:POKE53281,2:POKE53280,2
13 GETA$:ON-(A$="")GOTO13:X=X+1000:PRINT"[147]":POKE53280,0:POKE53281,0:GOTO12
14 REM
15 REM ********************************
16 REM *                              *
17 REM * VOODOO-NOTER TEXTANZEIGER V1 *
18 REM *   WRITTEN FOR PUBLICATION    *
19 REM *             BY               *
20 REM *      ZEITGEIST/H-T/WIL       *
21 REM *                              *
22 REM ********************************